home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / soundxx / SOUNDXS2.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1999-05-30  |  38.1 KB  |  1,075 lines
  1. VERSION 5.00
  2. Object = "{B88FD7E2-1AC1-11D1-86A2-006097B34438}#1.0#0"; "MSOUNDXX.OCX"
  3. Begin VB.Form FrmSoundXSample2 
  4.    Appearance      =   0  'Flat
  5.    BorderStyle     =   1  'Fixed Single
  6.    Caption         =   "SoundX/X Sample 2"
  7.    ClientHeight    =   4935
  8.    ClientLeft      =   2295
  9.    ClientTop       =   3510
  10.    ClientWidth     =   6015
  11.    BeginProperty Font 
  12.       Name            =   "MS Sans Serif"
  13.       Size            =   8.25
  14.       Charset         =   0
  15.       Weight          =   700
  16.       Underline       =   0   'False
  17.       Italic          =   0   'False
  18.       Strikethrough   =   0   'False
  19.    EndProperty
  20.    ForeColor       =   &H80000008&
  21.    LinkTopic       =   "Form1"
  22.    PaletteMode     =   1  'UseZOrder
  23.    ScaleHeight     =   4935
  24.    ScaleWidth      =   6015
  25.    Begin MSOUNDXXLib.SoundXX SoundXX1 
  26.       Left            =   5280
  27.       Top             =   1680
  28.       _ExtentX        =   847
  29.       _ExtentY        =   847
  30.    End
  31.    Begin VB.ListBox List3 
  32.       Height          =   1815
  33.       Left            =   4080
  34.       TabIndex        =   6
  35.       Top             =   2880
  36.       Width           =   1695
  37.    End
  38.    Begin VB.ListBox List2 
  39.       Height          =   1815
  40.       Left            =   2160
  41.       TabIndex        =   5
  42.       Top             =   2880
  43.       Width           =   1695
  44.    End
  45.    Begin VB.ListBox List1 
  46.       Height          =   1815
  47.       Left            =   240
  48.       TabIndex        =   4
  49.       Top             =   2880
  50.       Width           =   1695
  51.    End
  52.    Begin VB.ComboBox Combo1 
  53.       Height          =   315
  54.       Left            =   240
  55.       Style           =   2  'Dropdown List
  56.       TabIndex        =   0
  57.       Top             =   1800
  58.       Width           =   2055
  59.    End
  60.    Begin VB.Label Label5 
  61.       Appearance      =   0  'Flat
  62.       BackColor       =   &H00C0C0C0&
  63.       BackStyle       =   0  'Transparent
  64.       Caption         =   $"soundxs2.frx":0000
  65.       BeginProperty Font 
  66.          Name            =   "MS Sans Serif"
  67.          Size            =   9.75
  68.          Charset         =   0
  69.          Weight          =   400
  70.          Underline       =   0   'False
  71.          Italic          =   0   'False
  72.          Strikethrough   =   0   'False
  73.       EndProperty
  74.       Height          =   1335
  75.       Left            =   240
  76.       TabIndex        =   7
  77.       Top             =   120
  78.       Width           =   5535
  79.    End
  80.    Begin VB.Label Label1 
  81.       Alignment       =   2  'Center
  82.       Appearance      =   0  'Flat
  83.       BackColor       =   &H00C0C0C0&
  84.       BackStyle       =   0  'Transparent
  85.       Caption         =   "Soundex"
  86.       BeginProperty Font 
  87.          Name            =   "MS Sans Serif"
  88.          Size            =   8.25
  89.          Charset         =   0
  90.          Weight          =   400
  91.          Underline       =   0   'False
  92.          Italic          =   0   'False
  93.          Strikethrough   =   0   'False
  94.       EndProperty
  95.       Height          =   255
  96.       Left            =   240
  97.       TabIndex        =   11
  98.       Top             =   2340
  99.       Width           =   1695
  100.    End
  101.    Begin VB.Label Label4 
  102.       Appearance      =   0  'Flat
  103.       BackColor       =   &H00C0C0C0&
  104.       BackStyle       =   0  'Transparent
  105.       Caption         =   "Input Name:"
  106.       BeginProperty Font 
  107.          Name            =   "MS Sans Serif"
  108.          Size            =   8.25
  109.          Charset         =   0
  110.          Weight          =   400
  111.          Underline       =   0   'False
  112.          Italic          =   0   'False
  113.          Strikethrough   =   0   'False
  114.       EndProperty
  115.       Height          =   255
  116.       Left            =   240
  117.       TabIndex        =   10
  118.       Top             =   1560
  119.       Width           =   2055
  120.    End
  121.    Begin VB.Label Label3 
  122.       Alignment       =   2  'Center
  123.       Appearance      =   0  'Flat
  124.       BackColor       =   &H00C0C0C0&
  125.       BackStyle       =   0  'Transparent
  126.       Caption         =   "Metaphone"
  127.       BeginProperty Font 
  128.          Name            =   "MS Sans Serif"
  129.          Size            =   8.25
  130.          Charset         =   0
  131.          Weight          =   400
  132.          Underline       =   0   'False
  133.          Italic          =   0   'False
  134.          Strikethrough   =   0   'False
  135.       EndProperty
  136.       Height          =   255
  137.       Left            =   4080
  138.       TabIndex        =   9
  139.       Top             =   2340
  140.       Width           =   1695
  141.    End
  142.    Begin VB.Label Label2 
  143.       Alignment       =   2  'Center
  144.       Appearance      =   0  'Flat
  145.       BackColor       =   &H00C0C0C0&
  146.       BackStyle       =   0  'Transparent
  147.       Caption         =   "ExtSoundex"
  148.       BeginProperty Font 
  149.          Name            =   "MS Sans Serif"
  150.          Size            =   8.25
  151.          Charset         =   0
  152.          Weight          =   400
  153.          Underline       =   0   'False
  154.          Italic          =   0   'False
  155.          Strikethrough   =   0   'False
  156.       EndProperty
  157.       Height          =   255
  158.       Left            =   2160
  159.       TabIndex        =   8
  160.       Top             =   2340
  161.       Width           =   1695
  162.    End
  163.    Begin VB.Label Metaphone 
  164.       Alignment       =   2  'Center
  165.       BorderStyle     =   1  'Fixed Single
  166.       Height          =   255
  167.       Left            =   4080
  168.       TabIndex        =   3
  169.       Top             =   2640
  170.       Width           =   1695
  171.    End
  172.    Begin VB.Label ExtSoundex 
  173.       Alignment       =   2  'Center
  174.       BorderStyle     =   1  'Fixed Single
  175.       Height          =   255
  176.       Left            =   2160
  177.       TabIndex        =   2
  178.       Top             =   2640
  179.       Width           =   1695
  180.    End
  181.    Begin VB.Label Soundex 
  182.       Alignment       =   2  'Center
  183.       BorderStyle     =   1  'Fixed Single
  184.       Height          =   255
  185.       Left            =   240
  186.       TabIndex        =   1
  187.       Top             =   2640
  188.       Width           =   1695
  189.    End
  190. Attribute VB_Name = "FrmSoundXSample2"
  191. Attribute VB_GlobalNameSpace = False
  192. Attribute VB_Creatable = False
  193. Attribute VB_PredeclaredId = True
  194. Attribute VB_Exposed = False
  195. Option Explicit
  196. Private Sub Combo1_Change()
  197.     Dim I As Integer
  198.     SoundXX1.Word = Combo1.Text
  199.     Soundex = SoundXX1.Soundex
  200.     ExtSoundex = SoundXX1.ExtSoundex
  201.     Metaphone = SoundXX1.Metaphone
  202.     List1.Clear
  203.     List2.Clear
  204.     List3.Clear
  205.     DoEvents
  206.     Screen.MousePointer = 11
  207.     For I = 0 To Combo1.ListCount - 1
  208.         SoundXX1.Word = Combo1.List(I)
  209.         If SoundXX1.Soundex = Soundex Then List1.AddItem Combo1.List(I)
  210.         If SoundXX1.ExtSoundex = ExtSoundex Then List2.AddItem Combo1.List(I)
  211.         If SoundXX1.Metaphone = Metaphone Then List3.AddItem Combo1.List(I)
  212.     Next I
  213.     Screen.MousePointer = 0
  214. End Sub
  215. Private Sub Combo1_Click()
  216.     Combo1_Change
  217. End Sub
  218. Private Sub Form_Load()
  219.     Combo1.AddItem UCase$("ABRAHAMSON")
  220.     Combo1.AddItem UCase$("ABREVAYA")
  221.     Combo1.AddItem UCase$("ACHENBACH")
  222.     Combo1.AddItem UCase$("achenback")
  223.     Combo1.AddItem UCase$("ACRES")
  224.     Combo1.AddItem UCase$("ADAMS")
  225.     Combo1.AddItem UCase$("ADKINSON")
  226.     Combo1.AddItem UCase$("AGARWALLA")
  227.     Combo1.AddItem UCase$("AGUILAR")
  228.     Combo1.AddItem UCase$("AIMAR")
  229.     Combo1.AddItem UCase$("AKHTAR")
  230.     Combo1.AddItem UCase$("ALBRECHT")
  231.     Combo1.AddItem UCase$("ALBRIGHT")
  232.     Combo1.AddItem UCase$("ALCORN")
  233.     Combo1.AddItem UCase$("ALLEN")
  234.     Combo1.AddItem UCase$("ALSOP")
  235.     Combo1.AddItem UCase$("ALSTON")
  236.     Combo1.AddItem UCase$("ALTENDERFER")
  237.     Combo1.AddItem UCase$("ALTON")
  238.     Combo1.AddItem UCase$("ALVES")
  239.     Combo1.AddItem UCase$("AMERICA")
  240.     Combo1.AddItem UCase$("ANDERSON")
  241.     Combo1.AddItem UCase$("ANDREWS")
  242.     Combo1.AddItem UCase$("ANTILL")
  243.     Combo1.AddItem UCase$("antley")
  244.     Combo1.AddItem UCase$("ANTOSHAK")
  245.     Combo1.AddItem UCase$("AQUINO")
  246.     Combo1.AddItem UCase$("ARENA")
  247.     Combo1.AddItem UCase$("ARMSTRONG")
  248.     Combo1.AddItem UCase$("ARNOLD")
  249.     Combo1.AddItem UCase$("ARSLANGIRAY")
  250.     Combo1.AddItem UCase$("ASHENDORF")
  251.     Combo1.AddItem UCase$("ASSOCIATES")
  252.     Combo1.AddItem UCase$("ASTBURY")
  253.     Combo1.AddItem UCase$("ATTAYA")
  254.     Combo1.AddItem UCase$("AUSTIN")
  255.     Combo1.AddItem UCase$("AXSON")
  256.     Combo1.AddItem UCase$("BABCOCK")
  257.     Combo1.AddItem UCase$("BACHE")
  258.     Combo1.AddItem UCase$("BACHMANN")
  259.     Combo1.AddItem UCase$("BACKSTROM")
  260.     Combo1.AddItem UCase$("BADEAUX")
  261.     Combo1.AddItem UCase$("BAILES")
  262.     Combo1.AddItem UCase$("BAILEY")
  263.     Combo1.AddItem UCase$("BAIRSTOW")
  264.     Combo1.AddItem UCase$("BAKER")
  265.     Combo1.AddItem UCase$("BALDRIDGE")
  266.     Combo1.AddItem UCase$("BALOCCA")
  267.     Combo1.AddItem UCase$("BALOG")
  268.     Combo1.AddItem UCase$("Balshone")
  269.     Combo1.AddItem UCase$("BARB")
  270.     Combo1.AddItem UCase$("BARBARIA")
  271.     Combo1.AddItem UCase$("BARCELLOS")
  272.     Combo1.AddItem UCase$("BARD")
  273.     Combo1.AddItem UCase$("BARESEL")
  274.     Combo1.AddItem UCase$("BARKDULL")
  275.     Combo1.AddItem UCase$("BARKER")
  276.     Combo1.AddItem UCase$("Barlow")
  277.     Combo1.AddItem UCase$("BARNES")
  278.     Combo1.AddItem UCase$("BARRIGA")
  279.     Combo1.AddItem UCase$("BARRY")
  280.     Combo1.AddItem UCase$("BARTEE")
  281.     Combo1.AddItem UCase$("BARTLEY")
  282.     Combo1.AddItem UCase$("Barton")
  283.     Combo1.AddItem UCase$("BARTORILLO")
  284.     Combo1.AddItem UCase$("BASS")
  285.     Combo1.AddItem UCase$("BAUM")
  286.     Combo1.AddItem UCase$("BAXTER")
  287.     Combo1.AddItem UCase$("BAYLESS")
  288.     Combo1.AddItem UCase$("BAYNE")
  289.     Combo1.AddItem UCase$("BAZAN")
  290.     Combo1.AddItem UCase$("BEACHAM")
  291.     Combo1.AddItem UCase$("BEALE")
  292.     Combo1.AddItem UCase$("BECKER")
  293.     Combo1.AddItem UCase$("BEEBE")
  294.     Combo1.AddItem UCase$("beegan")
  295.     Combo1.AddItem UCase$("BEEL")
  296.     Combo1.AddItem UCase$("BEHNKE")
  297.     Combo1.AddItem UCase$("BELLAART")
  298.     Combo1.AddItem UCase$("BENDER")
  299.     Combo1.AddItem UCase$("BENGE")
  300.     Combo1.AddItem UCase$("BENHERSCHEL")
  301.     Combo1.AddItem UCase$("BENNETT")
  302.     Combo1.AddItem UCase$("BENSEN")
  303.     Combo1.AddItem UCase$("BERARDELLI")
  304.     Combo1.AddItem UCase$("BERCINI")
  305.     Combo1.AddItem UCase$("BERG")
  306.     Combo1.AddItem UCase$("BERGER")
  307.     Combo1.AddItem UCase$("BERGONZI")
  308.     Combo1.AddItem UCase$("BERNAUER")
  309.     Combo1.AddItem UCase$("BERNDT")
  310.     Combo1.AddItem UCase$("berning")
  311.     Combo1.AddItem UCase$("BERNSTEIN")
  312.     Combo1.AddItem UCase$("BERRY")
  313.     Combo1.AddItem UCase$("BERTSCH")
  314.     Combo1.AddItem UCase$("BETANCOURT")
  315.     Combo1.AddItem UCase$("BEVILACQUA")
  316.     Combo1.AddItem UCase$("BEZIRTZOGLOU")
  317.     Combo1.AddItem UCase$("BIGGS")
  318.     Combo1.AddItem UCase$("BIGLER")
  319.     Combo1.AddItem UCase$("Biondo")
  320.     Combo1.AddItem UCase$("BISCH")
  321.     Combo1.AddItem UCase$("BISESI")
  322.     Combo1.AddItem UCase$("BJERRE")
  323.     Combo1.AddItem UCase$("BLABER")
  324.     Combo1.AddItem UCase$("BLACKMAN")
  325.     Combo1.AddItem UCase$("BLACKSTOCK")
  326.     Combo1.AddItem UCase$("BLAIR")
  327.     Combo1.AddItem UCase$("BLAKE")
  328.     Combo1.AddItem UCase$("BLAKELEY")
  329.     Combo1.AddItem UCase$("BLANDAMER")
  330.     Combo1.AddItem UCase$("BLANTON")
  331.     Combo1.AddItem UCase$("BLAU")
  332.     Combo1.AddItem UCase$("BLENHEIM")
  333.     Combo1.AddItem UCase$("BLEVINS")
  334.     Combo1.AddItem UCase$("BLISS")
  335.     Combo1.AddItem UCase$("BLOOM")
  336.     Combo1.AddItem UCase$("BLOW")
  337.     Combo1.AddItem UCase$("BLUMENTHAL")
  338.     Combo1.AddItem UCase$("Boardwine")
  339.     Combo1.AddItem UCase$("BOATWRIGHT")
  340.     Combo1.AddItem UCase$("BOCTOR")
  341.     Combo1.AddItem UCase$("BODLEY")
  342.     Combo1.AddItem UCase$("BOGER")
  343.     Combo1.AddItem UCase$("BOGGESS")
  344.     Combo1.AddItem UCase$("BOHN")
  345.     Combo1.AddItem UCase$("BOLING")
  346.     Combo1.AddItem UCase$("BOLITHO")
  347.     Combo1.AddItem UCase$("BOLOGNA")
  348.     Combo1.AddItem UCase$("BOLTON")
  349.     Combo1.AddItem UCase$("BONN")
  350.     Combo1.AddItem UCase$("BOOGAART")
  351.     Combo1.AddItem UCase$("BOOKHAMER")
  352.     Combo1.AddItem UCase$("BOOTH")
  353.     Combo1.AddItem UCase$("BORAK")
  354.     Combo1.AddItem UCase$("BORN")
  355.     Combo1.AddItem UCase$("BORTONE")
  356.     Combo1.AddItem UCase$("BORZYMATE")
  357.     Combo1.AddItem UCase$("BOTKIN")
  358.     Combo1.AddItem UCase$("BOURNE")
  359.     Combo1.AddItem UCase$("BOUTWELL")
  360.     Combo1.AddItem UCase$("BOWDEN")
  361.     Combo1.AddItem UCase$("BOWER")
  362.     Combo1.AddItem UCase$("BOYKIN")
  363.     Combo1.AddItem UCase$("BOYLE")
  364.     Combo1.AddItem UCase$("BRADFORD")
  365.     Combo1.AddItem UCase$("BRANDT")
  366.     Combo1.AddItem UCase$("BRANN")
  367.     Combo1.AddItem UCase$("BRANNON")
  368.     Combo1.AddItem UCase$("BRANSTETTER")
  369.     Combo1.AddItem UCase$("BRANTLEY")
  370.     Combo1.AddItem UCase$("BRAUE")
  371.     Combo1.AddItem UCase$("BRICMONT")
  372.     Combo1.AddItem UCase$("BRIDGE")
  373.     Combo1.AddItem UCase$("BRIGGS")
  374.     Combo1.AddItem UCase$("BROADFOOT")
  375.     Combo1.AddItem UCase$("Brodka")
  376.     Combo1.AddItem UCase$("BROHN")
  377.     Combo1.AddItem UCase$("BRONNER")
  378.     Combo1.AddItem UCase$("brooks")
  379.     Combo1.AddItem UCase$("BROWN")
  380.     Combo1.AddItem UCase$("BROWNE")
  381.     Combo1.AddItem UCase$("BROWNELL")
  382.     Combo1.AddItem UCase$("BROWSER")
  383.     Combo1.AddItem UCase$("BRUCE")
  384.     Combo1.AddItem UCase$("BRUMLEY")
  385.     Combo1.AddItem UCase$("BRUNO")
  386.     Combo1.AddItem UCase$("BRUNS")
  387.     Combo1.AddItem UCase$("BRYER")
  388.     Combo1.AddItem UCase$("BRYSON")
  389.     Combo1.AddItem UCase$("BUCKLAND")
  390.     Combo1.AddItem UCase$("BUFKIN")
  391.     Combo1.AddItem UCase$("BULLITT")
  392.     Combo1.AddItem UCase$("BURCH")
  393.     Combo1.AddItem UCase$("BURKE")
  394.     Combo1.AddItem UCase$("BURKEEN")
  395.     Combo1.AddItem UCase$("BURKHART")
  396.     Combo1.AddItem UCase$("BURMAN")
  397.     Combo1.AddItem UCase$("Burns")
  398.     Combo1.AddItem UCase$("BURRIDGE")
  399.     Combo1.AddItem UCase$("BURTON")
  400.     Combo1.AddItem UCase$("BUSH")
  401.     Combo1.AddItem UCase$("BUSHEY")
  402.     Combo1.AddItem UCase$("BUSZKIEWICZ")
  403.     Combo1.AddItem UCase$("BUTTS")
  404.     Combo1.AddItem UCase$("C")
  405.     Combo1.AddItem UCase$("CABLE")
  406.     Combo1.AddItem UCase$("CABRAL")
  407.     Combo1.AddItem UCase$("CADHLA")
  408.     Combo1.AddItem UCase$("CAINES")
  409.     Combo1.AddItem UCase$("CALLAHAN")
  410.     Combo1.AddItem UCase$("CALLOW")
  411.     Combo1.AddItem UCase$("CALOURO")
  412.     Combo1.AddItem UCase$("CAMPBELL")
  413.     Combo1.AddItem UCase$("CAMPFIELD")
  414.     Combo1.AddItem UCase$("CAPLAN")
  415.     Combo1.AddItem UCase$("CARD")
  416.     Combo1.AddItem UCase$("CARLE")
  417.     Combo1.AddItem UCase$("CARMEIN")
  418.     Combo1.AddItem UCase$("CARPENTER")
  419.     Combo1.AddItem UCase$("CARR")
  420.     Combo1.AddItem UCase$("CARVIN")
  421.     Combo1.AddItem UCase$("CARY")
  422.     Combo1.AddItem UCase$("CASEY")
  423.     Combo1.AddItem UCase$("CASSARINO")
  424.     Combo1.AddItem UCase$("CASSIDY")
  425.     Combo1.AddItem UCase$("CASTELLANO")
  426.     Combo1.AddItem UCase$("CAULKINS")
  427.     Combo1.AddItem UCase$("CAWLEW")
  428.     Combo1.AddItem UCase$("CELAYETA")
  429.     Combo1.AddItem UCase$("CESZIK")
  430.     Combo1.AddItem UCase$("CHADWICK")
  431.     Combo1.AddItem UCase$("CHAMBERS")
  432.     Combo1.AddItem UCase$("CHAMBLEE")
  433.     Combo1.AddItem UCase$("CHAMPIGNY")
  434.     Combo1.AddItem UCase$("CHAMPION")
  435.     Combo1.AddItem UCase$("CHAN")
  436.     Combo1.AddItem UCase$("CHAO")
  437.     Combo1.AddItem UCase$("CHAPMAN")
  438.     Combo1.AddItem UCase$("CHAPNICK")
  439.     Combo1.AddItem UCase$("CHAREST")
  440.     Combo1.AddItem UCase$("CHARTON")
  441.     Combo1.AddItem UCase$("CHASE")
  442.     Combo1.AddItem UCase$("CHAST")
  443.     Combo1.AddItem UCase$("CHENG")
  444.     Combo1.AddItem UCase$("CHIELDS")
  445.     Combo1.AddItem UCase$("CHIGGES")
  446.     Combo1.AddItem UCase$("Choi")
  447.     Combo1.AddItem UCase$("CHOMYOK")
  448.     Combo1.AddItem UCase$("CHOW")
  449.     Combo1.AddItem UCase$("CHRISTIANSON")
  450.     Combo1.AddItem UCase$("CHUNG")
  451.     Combo1.AddItem UCase$("CHURBUCK")
  452.     Combo1.AddItem UCase$("CHWATAL")
  453.     Combo1.AddItem UCase$("CICCIARELLA")
  454.     Combo1.AddItem UCase$("cipriano")
  455.     Combo1.AddItem UCase$("CLAIL")
  456.     Combo1.AddItem UCase$("CLARK")
  457.     Combo1.AddItem UCase$("CLASKY")
  458.     Combo1.AddItem UCase$("CLAYTON")
  459.     Combo1.AddItem UCase$("CLIFFORD")
  460.     Combo1.AddItem UCase$("CLINE")
  461.     Combo1.AddItem UCase$("CLINK")
  462.     Combo1.AddItem UCase$("COATES")
  463.     Combo1.AddItem UCase$("COHEN")
  464.     Combo1.AddItem UCase$("COJOCARIU")
  465.     Combo1.AddItem UCase$("COLE")
  466.     Combo1.AddItem UCase$("COLELLA")
  467.     Combo1.AddItem UCase$("Collica")
  468.     Combo1.AddItem UCase$("COLLINS")
  469.     Combo1.AddItem UCase$("COLONTONIO")
  470.     Combo1.AddItem UCase$("COLVEN")
  471.     Combo1.AddItem UCase$("COMEGYS")
  472.     Combo1.AddItem UCase$("COMSTOCK")
  473.     Combo1.AddItem UCase$("CONLIFFE")
  474.     Combo1.AddItem UCase$("CONNER")
  475.     Combo1.AddItem UCase$("CONNLEY")
  476.     Combo1.AddItem UCase$("CONNOR")
  477.     Combo1.AddItem UCase$("CONRAD")
  478.     Combo1.AddItem UCase$("COOK")
  479.     Combo1.AddItem UCase$("COOKE")
  480.     Combo1.AddItem UCase$("COOMBS")
  481.     Combo1.AddItem UCase$("Coon")
  482.     Combo1.AddItem UCase$("cooper")
  483.     Combo1.AddItem UCase$("COORDINATOR")
  484.     Combo1.AddItem UCase$("COORENS")
  485.     Combo1.AddItem UCase$("COPELAND")
  486.     Combo1.AddItem UCase$("CORBETT")
  487.     Combo1.AddItem UCase$("CORLESS")
  488.     Combo1.AddItem UCase$("CORRAL")
  489.     Combo1.AddItem UCase$("CORSI")
  490.     Combo1.AddItem UCase$("COSEL")
  491.     Combo1.AddItem UCase$("COUGHLIN")
  492.     Combo1.AddItem UCase$("COUPER")
  493.     Combo1.AddItem UCase$("COUSINEAU")
  494.     Combo1.AddItem UCase$("COVAS")
  495.     Combo1.AddItem UCase$("COX")
  496.     Combo1.AddItem UCase$("COXEY")
  497.     Combo1.AddItem UCase$("CRAGOE")
  498.     Combo1.AddItem UCase$("CRAVENER")
  499.     Combo1.AddItem UCase$("CREASY")
  500.     Combo1.AddItem UCase$("CRIDER")
  501.     Combo1.AddItem UCase$("CRITES")
  502.     Combo1.AddItem UCase$("CROFT")
  503.     Combo1.AddItem UCase$("CROSS")
  504.     Combo1.AddItem UCase$("CROWE")
  505.     Combo1.AddItem UCase$("CROWELL")
  506.     Combo1.AddItem UCase$("CRUMPLER")
  507.     Combo1.AddItem UCase$("CRUZ")
  508.     Combo1.AddItem UCase$("CUMMINS")
  509.     Combo1.AddItem UCase$("Cunningham")
  510.     Combo1.AddItem UCase$("CUOZZO")
  511.     Combo1.AddItem UCase$("CURRY")
  512.     Combo1.AddItem UCase$("CURTIS")
  513.     Combo1.AddItem UCase$("CUTRARA")
  514.     Combo1.AddItem UCase$("CYBULSKI")
  515.     Combo1.AddItem UCase$("DAHL")
  516.     Combo1.AddItem UCase$("DAHLIN")
  517.     Combo1.AddItem UCase$("DAKOS")
  518.     Combo1.AddItem UCase$("DALTON")
  519.     Combo1.AddItem UCase$("DAMON")
  520.     Combo1.AddItem UCase$("DANIELS")
  521.     Combo1.AddItem UCase$("DANNER")
  522.     Combo1.AddItem UCase$("DANTZLER")
  523.     Combo1.AddItem UCase$("DAVIE")
  524.     Combo1.AddItem UCase$("DAVIES")
  525.     Combo1.AddItem UCase$("DAVIS")
  526.     Combo1.AddItem UCase$("DAWSON")
  527.     Combo1.AddItem UCase$("DEADY")
  528.     Combo1.AddItem UCase$("DEAL")
  529.     Combo1.AddItem UCase$("DEAN")
  530.     Combo1.AddItem UCase$("DEARBECK")
  531.     Combo1.AddItem UCase$("DEAVER")
  532.     Combo1.AddItem UCase$("DEBRA")
  533.     Combo1.AddItem UCase$("DECELLES")
  534.     Combo1.AddItem UCase$("DEFOE")
  535.     Combo1.AddItem UCase$("DEFOOR")
  536.     Combo1.AddItem UCase$("DEJONGHE")
  537.     Combo1.AddItem UCase$("DELAIR")
  538.     Combo1.AddItem UCase$("DELARGEY")
  539.     Combo1.AddItem UCase$("DELLORFANO")
  540.     Combo1.AddItem UCase$("DEMERITT")
  541.     Combo1.AddItem UCase$("DEMMITT")
  542.     Combo1.AddItem UCase$("DEMMON")
  543.     Combo1.AddItem UCase$("DENAIS")
  544.     Combo1.AddItem UCase$("DENNING")
  545.     Combo1.AddItem UCase$("DENNIS")
  546.     Combo1.AddItem UCase$("DENNISON")
  547.     Combo1.AddItem UCase$("DEROBERTS")
  548.     Combo1.AddItem UCase$("DESHONG")
  549.     Combo1.AddItem UCase$("DESKINS")
  550.     Combo1.AddItem UCase$("DESMOND")
  551.     Combo1.AddItem UCase$("DEWEESE")
  552.     Combo1.AddItem UCase$("DEWITT")
  553.     Combo1.AddItem UCase$("Diachun")
  554.     Combo1.AddItem UCase$("diamond")
  555.     Combo1.AddItem UCase$("DIAZ")
  556.     Combo1.AddItem UCase$("DICKSON")
  557.     Combo1.AddItem UCase$("DIETZ")
  558.     Combo1.AddItem UCase$("DIFRANCESCO")
  559.     Combo1.AddItem UCase$("DIJAK")
  560.     Combo1.AddItem UCase$("DILWORTH")
  561.     Combo1.AddItem UCase$("DIMICK")
  562.     Combo1.AddItem UCase$("Dinse")
  563.     Combo1.AddItem UCase$("DIROFF")
  564.     Combo1.AddItem UCase$("DISHAROON")
  565.     Combo1.AddItem UCase$("DISHON")
  566.     Combo1.AddItem UCase$("DITTMAR")
  567.     Combo1.AddItem UCase$("DOCKENDORF")
  568.     Combo1.AddItem UCase$("DOLINSKY")
  569.     Combo1.AddItem UCase$("DOLSEN")
  570.     Combo1.AddItem UCase$("DONICA")
  571.     Combo1.AddItem UCase$("DONLEY")
  572.     Combo1.AddItem UCase$("DONOVAN")
  573.     Combo1.AddItem UCase$("DORSEY")
  574.     Combo1.AddItem UCase$("DOUGLASS")
  575.     Combo1.AddItem UCase$("DRAICCHIO")
  576.     Combo1.AddItem UCase$("DRAKE")
  577.     Combo1.AddItem UCase$("DREBES")
  578.     Combo1.AddItem UCase$("DRISCOLL")
  579.     Combo1.AddItem UCase$("DROZD")
  580.     Combo1.AddItem UCase$("DRUKER")
  581.     Combo1.AddItem UCase$("DRUMMOND")
  582.     Combo1.AddItem UCase$("DUCREUX")
  583.     Combo1.AddItem UCase$("DUERR")
  584.     Combo1.AddItem UCase$("DUFFIN")
  585.     Combo1.AddItem UCase$("DUFRESNE")
  586.     Combo1.AddItem UCase$("DUKES")
  587.     Combo1.AddItem UCase$("DUMONT")
  588.     Combo1.AddItem UCase$("DUNCAN")
  589.     Combo1.AddItem UCase$("DUNLAP")
  590.     Combo1.AddItem UCase$("DUNN")
  591.     Combo1.AddItem UCase$("DUPONT")
  592.     Combo1.AddItem UCase$("DUVALL")
  593.     Combo1.AddItem UCase$("DYE")
  594.     Combo1.AddItem UCase$("DYKAS")
  595.     Combo1.AddItem UCase$("DYKE")
  596.     Combo1.AddItem UCase$("DYSON-HUDSON")
  597.     Combo1.AddItem UCase$("DZUDZ")
  598.     Combo1.AddItem UCase$("EAKEN")
  599.     Combo1.AddItem UCase$("EASTHAM")
  600.     Combo1.AddItem UCase$("EASTON")
  601.     Combo1.AddItem UCase$("EBERSOLE")
  602.     Combo1.AddItem UCase$("EBY")
  603.     Combo1.AddItem UCase$("EDER")
  604.     Combo1.AddItem UCase$("EDGINGTON")
  605.     Combo1.AddItem UCase$("EDISON")
  606.     Combo1.AddItem UCase$("EDMUNDS")
  607.     Combo1.AddItem UCase$("EDWARDS")
  608.     Combo1.AddItem UCase$("EDWARDSON")
  609.     Combo1.AddItem UCase$("EHRENSHAFT")
  610.     Combo1.AddItem UCase$("EISENHART")
  611.     Combo1.AddItem UCase$("ELABI")
  612.     Combo1.AddItem UCase$("ELALAMI")
  613.     Combo1.AddItem UCase$("ELDER")
  614.     Combo1.AddItem UCase$("ELLINGEN")
  615.     Combo1.AddItem UCase$("ELLINGSON")
  616.     Combo1.AddItem UCase$("ELLIS")
  617.     Combo1.AddItem UCase$("ELY")
  618.     Combo1.AddItem UCase$("EMERSON")
  619.     Combo1.AddItem UCase$("EMMER")
  620.     Combo1.AddItem UCase$("ENGEBRETSON")
  621.     Combo1.AddItem UCase$("ENGELMAN")
  622.     Combo1.AddItem UCase$("ENNIS")
  623.     Combo1.AddItem UCase$("ENOS")
  624.     Combo1.AddItem UCase$("EPSTEIN")
  625.     Combo1.AddItem UCase$("ERICKSON")
  626.     Combo1.AddItem UCase$("ERKFITZ")
  627.     Combo1.AddItem UCase$("ESLER")
  628.     Combo1.AddItem UCase$("ESTES")
  629.     Combo1.AddItem UCase$("EVANS")
  630.     Combo1.AddItem UCase$("EVEZIC")
  631.     Combo1.AddItem UCase$("EWEN")
  632.     Combo1.AddItem UCase$("EWIG")
  633.     Combo1.AddItem UCase$("EWING")
  634.     Combo1.AddItem UCase$("FABRICANT")
  635.     Combo1.AddItem UCase$("FACZAN")
  636.     Combo1.AddItem UCase$("FAHLBERG")
  637.     Combo1.AddItem UCase$("fahrlander")
  638.     Combo1.AddItem UCase$("FAITOS")
  639.     Combo1.AddItem UCase$("FALCK")
  640.     Combo1.AddItem UCase$("Falk")
  641.     Combo1.AddItem UCase$("FAN")
  642.     Combo1.AddItem UCase$("FANCHER")
  643.     Combo1.AddItem UCase$("FARLEY")
  644.     Combo1.AddItem UCase$("Farm")
  645.     Combo1.AddItem UCase$("FARMER")
  646.     Combo1.AddItem UCase$("FARRE")
  647.     Combo1.AddItem UCase$("FARRELL")
  648.     Combo1.AddItem UCase$("FAULKNER")
  649.     Combo1.AddItem UCase$("FAUREZ")
  650.     Combo1.AddItem UCase$("FAY")
  651.     Combo1.AddItem UCase$("FEINBERG")
  652.     Combo1.AddItem UCase$("FELDMAN")
  653.     Combo1.AddItem UCase$("FERGUSON")
  654.     Combo1.AddItem UCase$("FERRELL")
  655.     Combo1.AddItem UCase$("FERRO")
  656.     Combo1.AddItem UCase$("FEUER")
  657.     Combo1.AddItem UCase$("FIELD")
  658.     Combo1.AddItem UCase$("FIELDMAN")
  659.     Combo1.AddItem UCase$("FIELDS")
  660.     Combo1.AddItem UCase$("FINEFROCK")
  661.     Combo1.AddItem UCase$("FINKELSTEIN")
  662.     Combo1.AddItem UCase$("FINTO")
  663.     Combo1.AddItem UCase$("FIORE")
  664.     Combo1.AddItem UCase$("FITLER")
  665.     Combo1.AddItem UCase$("FITZPATRICK")
  666.     Combo1.AddItem UCase$("FLAGG")
  667.     Combo1.AddItem UCase$("FLEAGLE")
  668.     Combo1.AddItem UCase$("FLEMING")
  669.     Combo1.AddItem UCase$("FONSECA")
  670.     Combo1.AddItem UCase$("FONTAINE")
  671.     Combo1.AddItem UCase$("FORBES")
  672.     Combo1.AddItem UCase$("FORBIN")
  673.     Combo1.AddItem UCase$("FORBUSH")
  674.     Combo1.AddItem UCase$("FORD")
  675.     Combo1.AddItem UCase$("FORMAN")
  676.     Combo1.AddItem UCase$("FORSYTHE")
  677.     Combo1.AddItem UCase$("FOSSEN")
  678.     Combo1.AddItem UCase$("Fouch")
  679.     Combo1.AddItem UCase$("FOUNTAINE")
  680.     Combo1.AddItem UCase$("FOX")
  681.     Combo1.AddItem UCase$("FOY")
  682.     Combo1.AddItem UCase$("FRALICK")
  683.     Combo1.AddItem UCase$("FRANCIS")
  684.     Combo1.AddItem UCase$("franck")
  685.     Combo1.AddItem UCase$("frank")
  686.     Combo1.AddItem UCase$("FRANKE")
  687.     Combo1.AddItem UCase$("FRANKHOUSER")
  688.     Combo1.AddItem UCase$("FRASIER")
  689.     Combo1.AddItem UCase$("FRECHMAN")
  690.     Combo1.AddItem UCase$("FREDERICKSON")
  691.     Combo1.AddItem UCase$("FREEHILL")
  692.     Combo1.AddItem UCase$("FREEMAN")
  693.     Combo1.AddItem UCase$("FRENCH")
  694.     Combo1.AddItem UCase$("FRESOLI")
  695.     Combo1.AddItem UCase$("FRETZ")
  696.     Combo1.AddItem UCase$("FRIAS")
  697.     Combo1.AddItem UCase$("FRIEDLAND")
  698.     Combo1.AddItem UCase$("FRIEDMAN")
  699.     Combo1.AddItem UCase$("FRIER")
  700.     Combo1.AddItem UCase$("FUENTES")
  701.     Combo1.AddItem UCase$("FUFFICHEN")
  702.     Combo1.AddItem UCase$("FULDA")
  703.     Combo1.AddItem UCase$("FULLER")
  704.     Combo1.AddItem UCase$("FULTER")
  705.     Combo1.AddItem UCase$("FUSCO")
  706.     Combo1.AddItem UCase$("FUTCH")
  707.     Combo1.AddItem UCase$("GAFFNEY")
  708.     Combo1.AddItem UCase$("GAFRON")
  709.     Combo1.AddItem UCase$("GAGLIARDI")
  710.     Combo1.AddItem UCase$("GAGNON")
  711.     Combo1.AddItem UCase$("GALLAGHER")
  712.     Combo1.AddItem UCase$("GALLAHER")
  713.     Combo1.AddItem UCase$("GALUSZKA")
  714.     Combo1.AddItem UCase$("GANDY")
  715.     Combo1.AddItem UCase$("GANGSTEE")
  716.     Combo1.AddItem UCase$("GANSHIRT")
  717.     Combo1.AddItem UCase$("GARDES")
  718.     Combo1.AddItem UCase$("Gardner")
  719.     Combo1.AddItem UCase$("Garfinkel")
  720.     Combo1.AddItem UCase$("GARRISON")
  721.     Combo1.AddItem UCase$("GARVEY")
  722.     Combo1.AddItem UCase$("GATCH")
  723.     Combo1.AddItem UCase$("GAUDREAULT")
  724.     Combo1.AddItem UCase$("GAUTHIER")
  725.     Combo1.AddItem UCase$("GAY")
  726.     Combo1.AddItem UCase$("GAZIA")
  727.     Combo1.AddItem UCase$("GEARHART")
  728.     Combo1.AddItem UCase$("GEARING")
  729.     Combo1.AddItem UCase$("GEE")
  730.     Combo1.AddItem UCase$("GEIGER")
  731.     Combo1.AddItem UCase$("GEORGE")
  732.     Combo1.AddItem UCase$("GERALD")
  733.     Combo1.AddItem UCase$("GERBER")
  734.     Combo1.AddItem UCase$("GERMANO")
  735.     Combo1.AddItem UCase$("GERTZ")
  736.     Combo1.AddItem UCase$("GETTYS")
  737.     Combo1.AddItem UCase$("GEVER")
  738.     Combo1.AddItem UCase$("GHOLSON")
  739.     Combo1.AddItem UCase$("GIANNINI")
  740.     Combo1.AddItem UCase$("GIBB")
  741.     Combo1.AddItem UCase$("GIBBONS")
  742.     Combo1.AddItem UCase$("GIBSON")
  743.     Combo1.AddItem UCase$("GILGEN")
  744.     Combo1.AddItem UCase$("GILLBANKS")
  745.     Combo1.AddItem UCase$("GILLEN")
  746.     Combo1.AddItem UCase$("GILLIAM")
  747.     Combo1.AddItem UCase$("GILLMORE")
  748.     Combo1.AddItem UCase$("GILMORE")
  749.     Combo1.AddItem UCase$("GIOVE")
  750.     Combo1.AddItem UCase$("GIRMAN")
  751.     Combo1.AddItem UCase$("GLASS")
  752.     Combo1.AddItem UCase$("GLOSSBRENNER")
  753.     Combo1.AddItem UCase$("GODDARD")
  754.     Combo1.AddItem UCase$("GODIN")
  755.     Combo1.AddItem UCase$("GOLDBERG")
  756.     Combo1.AddItem UCase$("GOLDING")
  757.     Combo1.AddItem UCase$("GOLDURAN")
  758.     Combo1.AddItem UCase$("GOOD")
  759.     Combo1.AddItem UCase$("GOODENOUGH")
  760.     Combo1.AddItem UCase$("GOODIN")
  761.     Combo1.AddItem UCase$("GOODMAN")
  762.     Combo1.AddItem UCase$("Gordemer")
  763.     Combo1.AddItem UCase$("gould")
  764.     Combo1.AddItem UCase$("GOURLAY")
  765.     Combo1.AddItem UCase$("GRAFF")
  766.     Combo1.AddItem UCase$("GRAHAM")
  767.     Combo1.AddItem UCase$("GRAINGER")
  768.     Combo1.AddItem UCase$("GRALLA")
  769.     Combo1.AddItem UCase$("Grant")
  770.     Combo1.AddItem UCase$("GRASGREEN")
  771.     Combo1.AddItem UCase$("GRAY")
  772.     Combo1.AddItem UCase$("Green")
  773.     Combo1.AddItem UCase$("GREENE")
  774.     Combo1.AddItem UCase$("GREER")
  775.     Combo1.AddItem UCase$("GREINER")
  776.     Combo1.AddItem UCase$("GRETTUM")
  777.     Combo1.AddItem UCase$("GREY")
  778.     Combo1.AddItem UCase$("GRIFFIN")
  779.     Combo1.AddItem UCase$("GRIMM")
  780.     Combo1.AddItem UCase$("GROENENDYLE")
  781.     Combo1.AddItem UCase$("GROGAN")
  782.     Combo1.AddItem UCase$("GROH")
  783.     Combo1.AddItem UCase$("GROSS")
  784.     Combo1.AddItem UCase$("Grosse")
  785.     Combo1.AddItem UCase$("GROVE")
  786.     Combo1.AddItem UCase$("GRUBER")
  787.     Combo1.AddItem UCase$("GRUNNILL")
  788.     Combo1.AddItem UCase$("GUITARD")
  789.     Combo1.AddItem UCase$("GUNDEL")
  790.     Combo1.AddItem UCase$("GUNDERLOY")
  791.     Combo1.AddItem UCase$("GUROWSKI")
  792.     Combo1.AddItem UCase$("GUTIERREZ")
  793.     Combo1.AddItem UCase$("GYNN")
  794.     Combo1.AddItem UCase$("GYSI")
  795.     Combo1.AddItem UCase$("Haan")
  796.     Combo1.AddItem UCase$("HABEGGER")
  797.     Combo1.AddItem UCase$("haff")
  798.     Combo1.AddItem UCase$("HAGMAN")
  799.     Combo1.AddItem UCase$("HAKIM")
  800.     Combo1.AddItem UCase$("HALDEMAN")
  801.     Combo1.AddItem UCase$("HALL")
  802.     Combo1.AddItem UCase$("HALLIDAY")
  803.     Combo1.AddItem UCase$("HALSTED")
  804.     Combo1.AddItem UCase$("HAMILTON")
  805.     Combo1.AddItem UCase$("HAMMOCK")
  806.     Combo1.AddItem UCase$("Hammond")
  807.     Combo1.AddItem UCase$("HAMPTON")
  808.     Combo1.AddItem UCase$("HANSEL")
  809.     Combo1.AddItem UCase$("HANSON")
  810.     Combo1.AddItem UCase$("HARBECK")
  811.     Combo1.AddItem UCase$("HARBIN")
  812.     Combo1.AddItem UCase$("Hardenburgh")
  813.     Combo1.AddItem UCase$("HARDWICK")
  814.     Combo1.AddItem UCase$("HARDY")
  815.     Combo1.AddItem UCase$("HARE")
  816.     Combo1.AddItem UCase$("HARLESS")
  817.     Combo1.AddItem UCase$("HARMON")
  818.     Combo1.AddItem UCase$("HARRIMAN")
  819.     Combo1.AddItem UCase$("HARRIS")
  820.     Combo1.AddItem UCase$("HARRISON")
  821.     Combo1.AddItem UCase$("HARTY")
  822.     Combo1.AddItem UCase$("HARVEY")
  823.     Combo1.AddItem UCase$("HASSELMAN")
  824.     Combo1.AddItem UCase$("Hatch")
  825.     Combo1.AddItem UCase$("HAUB")
  826.     Combo1.AddItem UCase$("HAVER")
  827.     Combo1.AddItem UCase$("HAWKINS")
  828.     Combo1.AddItem UCase$("HAWLEY")
  829.     Combo1.AddItem UCase$("HAYDEN")
  830.     Combo1.AddItem UCase$("HAYES")
  831.     Combo1.AddItem UCase$("HAYMANN")
  832.     Combo1.AddItem UCase$("HAZEN")
  833.     Combo1.AddItem UCase$("HAZLETT")
  834.     Combo1.AddItem UCase$("HEAD")
  835.     Combo1.AddItem UCase$("HEATON")
  836.     Combo1.AddItem UCase$("heck")
  837.     Combo1.AddItem UCase$("HEDBERG")
  838.     Combo1.AddItem UCase$("HEIDECKE")
  839.     Combo1.AddItem UCase$("HEILY")
  840.     Combo1.AddItem UCase$("HEIN")
  841.     Combo1.AddItem UCase$("HEINER")
  842.     Combo1.AddItem UCase$("HELDER")
  843.     Combo1.AddItem UCase$("Heller")
  844.     Combo1.AddItem UCase$("HENKEL")
  845.     Combo1.AddItem UCase$("HERCZ")
  846.     Combo1.AddItem UCase$("HERMAN")
  847.     Combo1.AddItem UCase$("HERNANDEZ")
  848.     Combo1.AddItem UCase$("HERRICK")
  849.     Combo1.AddItem UCase$("HERRIOTT")
  850.     Combo1.AddItem UCase$("HERZ")
  851.     Combo1.AddItem UCase$("H
  852. TRU")
  853.     Combo1.AddItem UCase$("HEVER")
  854.     Combo1.AddItem UCase$("HEYDEMANN")
  855.     Combo1.AddItem UCase$("HEYL")
  856.     Combo1.AddItem UCase$("HEYMANN")
  857.     Combo1.AddItem UCase$("HIBBERT")
  858.     Combo1.AddItem UCase$("HICKERSON")
  859.     Combo1.AddItem UCase$("HICKLING")
  860.     Combo1.AddItem UCase$("HICKS")
  861.     Combo1.AddItem UCase$("HIGGINS")
  862.     Combo1.AddItem UCase$("HIGGS")
  863.     Combo1.AddItem UCase$("HILBERS")
  864.     Combo1.AddItem UCase$("HILD")
  865.     Combo1.AddItem UCase$("HILLERBRAND")
  866.     Combo1.AddItem UCase$("HILLEY")
  867.     Combo1.AddItem UCase$("HINSON")
  868.     Combo1.AddItem UCase$("HINTON")
  869.     Combo1.AddItem UCase$("HOECK")
  870.     Combo1.AddItem UCase$("HOFFMAN")
  871.     Combo1.AddItem UCase$("HOGAN")
  872.     Combo1.AddItem UCase$("HOITT")
  873.     Combo1.AddItem UCase$("HOLCOMBE")
  874.     Combo1.AddItem UCase$("HOLLER")
  875.     Combo1.AddItem UCase$("HOLMES")
  876.     Combo1.AddItem UCase$("HOLZINGER")
  877.     Combo1.AddItem UCase$("HONOROE")
  878.     Combo1.AddItem UCase$("HOPKINS")
  879.     Combo1.AddItem UCase$("HOPPER")
  880.     Combo1.AddItem UCase$("HORSTMAN")
  881.     Combo1.AddItem UCase$("HOSSACK")
  882.     Combo1.AddItem UCase$("Howard")
  883.     Combo1.AddItem UCase$("HRUSOVSZKY")
  884.     Combo1.AddItem UCase$("HUBER")
  885.     Combo1.AddItem UCase$("HUDAK")
  886.     Combo1.AddItem UCase$("HUDSON")
  887.     Combo1.AddItem UCase$("HUEBSCHWERLEN")
  888.     Combo1.AddItem UCase$("HUGHES")
  889.     Combo1.AddItem UCase$("HULL")
  890.     Combo1.AddItem UCase$("HULT")
  891.     Combo1.AddItem UCase$("HUMPHREY")
  892.     Combo1.AddItem UCase$("HUNT")
  893.     Combo1.AddItem UCase$("HURLEY")
  894.     Combo1.AddItem UCase$("HURTEAU")
  895.     Combo1.AddItem UCase$("HUSNEY")
  896.     Combo1.AddItem UCase$("HUSSEIN")
  897.     Combo1.AddItem UCase$("HUTCHINS")
  898.     Combo1.AddItem UCase$("HUTCHISON")
  899.     Combo1.AddItem UCase$("HUTSON")
  900.     Combo1.AddItem UCase$("HUYSER")
  901.     Combo1.AddItem UCase$("HYE")
  902.     Combo1.AddItem UCase$("HYSNER")
  903.     Combo1.AddItem UCase$("IMMIG")
  904.     Combo1.AddItem UCase$("INFANTE")
  905.     Combo1.AddItem UCase$("Innusa")
  906.     Combo1.AddItem UCase$("ISOTALO")
  907.     Combo1.AddItem UCase$("IVERSON")
  908.     Combo1.AddItem UCase$("IWASCHKIN")
  909.     Combo1.AddItem UCase$("IYER")
  910.     Combo1.AddItem UCase$("JACKMAN")
  911.     Combo1.AddItem UCase$("JACKSON")
  912.     Combo1.AddItem UCase$("JACMON")
  913.     Combo1.AddItem UCase$("JACOBSON")
  914.     Combo1.AddItem UCase$("JALBUENA")
  915.     Combo1.AddItem UCase$("JALLER")
  916.     Combo1.AddItem UCase$("JAMSGARD")
  917.     Combo1.AddItem UCase$("JANSON")
  918.     Combo1.AddItem UCase$("JARVIS")
  919.     Combo1.AddItem UCase$("JASAITIS")
  920.     Combo1.AddItem UCase$("JAY")
  921.     Combo1.AddItem UCase$("JEDLINSKI")
  922.     Combo1.AddItem UCase$("JEFFERS")
  923.     Combo1.AddItem UCase$("JEGEDE")
  924.     Combo1.AddItem UCase$("JENKINS")
  925.     Combo1.AddItem UCase$("Jenks")
  926.     Combo1.AddItem UCase$("JEROME")
  927.     Combo1.AddItem UCase$("JETSON")
  928.     Combo1.AddItem UCase$("JOHNS")
  929.     Combo1.AddItem UCase$("Johnson")
  930.     Combo1.AddItem UCase$("JOLLEY")
  931.     Combo1.AddItem UCase$("JONES")
  932.     Combo1.AddItem UCase$("JORDAN")
  933.     Combo1.AddItem UCase$("JORGE")
  934.     Combo1.AddItem UCase$("JORGENSEN")
  935.     Combo1.AddItem UCase$("JOYCE")
  936.     Combo1.AddItem UCase$("JURGENSEN")
  937.     Combo1.AddItem UCase$("KAIRIS")
  938.     Combo1.AddItem UCase$("KALISS")
  939.     Combo1.AddItem UCase$("KAMMEYER")
  940.     Combo1.AddItem UCase$("KANGLEY")
  941.     Combo1.AddItem UCase$("KAPADIA")
  942.     Combo1.AddItem UCase$("KARPINSKY")
  943.     Combo1.AddItem UCase$("KATCHER")
  944.     Combo1.AddItem UCase$("KATZ")
  945.     Combo1.AddItem UCase$("KAUER")
  946.     Combo1.AddItem UCase$("KAUFMAN")
  947.     Combo1.AddItem UCase$("Keavitt")
  948.     Combo1.AddItem UCase$("KEHO")
  949.     Combo1.AddItem UCase$("KEILY")
  950.     Combo1.AddItem UCase$("KELLER")
  951.     Combo1.AddItem UCase$("KELLERMAN")
  952.     Combo1.AddItem UCase$("KELLOGG")
  953.     Combo1.AddItem UCase$("Kelly")
  954.     Combo1.AddItem UCase$("KENDER")
  955.     Combo1.AddItem UCase$("KENNINGTON")
  956.     Combo1.AddItem UCase$("KENNY")
  957.     Combo1.AddItem UCase$("KEOHANE")
  958.     Combo1.AddItem UCase$("KERNS")
  959.     Combo1.AddItem UCase$("KERR")
  960.     Combo1.AddItem UCase$("KESLER")
  961.     Combo1.AddItem UCase$("KESNER")
  962.     Combo1.AddItem UCase$("KETCHAM")
  963.     Combo1.AddItem UCase$("KETNER")
  964.     Combo1.AddItem UCase$("KHAN")
  965.     Combo1.AddItem UCase$("KHOYLAR")
  966.     Combo1.AddItem UCase$("KIERNAN")
  967.     Combo1.AddItem UCase$("KIM")
  968.     Combo1.AddItem UCase$("KINDRED")
  969.     Combo1.AddItem UCase$("KING")
  970.     Combo1.AddItem UCase$("KINKEAD")
  971.     Combo1.AddItem UCase$("KIPLINGER")
  972.     Combo1.AddItem UCase$("KIRCHNER")
  973.     Combo1.AddItem UCase$("KIRK")
  974.     Combo1.AddItem UCase$("KIRSCH")
  975.     Combo1.AddItem UCase$("KLEIN")
  976.     Combo1.AddItem UCase$("KLIEVER")
  977.     Combo1.AddItem UCase$("KLINE")
  978.     Combo1.AddItem UCase$("KLINGER")
  979.     Combo1.AddItem UCase$("KNIGHT")
  980.     Combo1.AddItem UCase$("KNOBLAUCH")
  981.     Combo1.AddItem UCase$("KNUDSEN")
  982.     Combo1.AddItem UCase$("KOBB")
  983.     Combo1.AddItem UCase$("KOBLER")
  984.     Combo1.AddItem UCase$("KOEHLER")
  985.     Combo1.AddItem UCase$("KOEPKA")
  986.     Combo1.AddItem UCase$("KOESTER")
  987.     Combo1.AddItem UCase$("KOLAR")
  988.     Combo1.AddItem UCase$("KOLASA")
  989.     Combo1.AddItem UCase$("KOSLOW")
  990.     Combo1.AddItem UCase$("KOTHE")
  991.     Combo1.AddItem UCase$("KOWALCZYK")
  992.     Combo1.AddItem UCase$("KRACHT")
  993.     Combo1.AddItem UCase$("KRAFT")
  994.     Combo1.AddItem UCase$("KRAHMER")
  995.     Combo1.AddItem UCase$("KRAKOW")
  996.     Combo1.AddItem UCase$("KRAMER")
  997.     Combo1.AddItem UCase$("KRAUSE")
  998.     Combo1.AddItem UCase$("KRAYER")
  999.     Combo1.AddItem UCase$("KREISLER")
  1000.     Combo1.AddItem UCase$("KREYLING")
  1001.     Combo1.AddItem UCase$("KRISTOFF")
  1002.     Combo1.AddItem UCase$("KROOPINICK")
  1003.     Combo1.AddItem UCase$("KULLMAN")
  1004.     Combo1.AddItem UCase$("KWATER")
  1005.     Combo1.AddItem UCase$("KYLE")
  1006.     Combo1.AddItem UCase$("LABERIS")
  1007.     Combo1.AddItem UCase$("LAFEIR")
  1008.     Combo1.AddItem UCase$("LAIR")
  1009.     Combo1.AddItem UCase$("LAIRD")
  1010.     Combo1.AddItem UCase$("LALONDE")
  1011.     Combo1.AddItem UCase$("LAMINARCA")
  1012.     Combo1.AddItem UCase$("LANDRY")
  1013.     Combo1.AddItem UCase$("Lane")
  1014.     Combo1.AddItem UCase$("LANG")
  1015.     Combo1.AddItem UCase$("LANGA")
  1016.     Combo1.AddItem UCase$("LANGER")
  1017.     Combo1.AddItem UCase$("LAPOINTE")
  1018.     Combo1.AddItem UCase$("LARIMORE")
  1019.     Combo1.AddItem UCase$("LARIS")
  1020.     Combo1.AddItem UCase$("LASZKO")
  1021.     Combo1.AddItem UCase$("LAUGHLIN")
  1022.     Combo1.AddItem UCase$("LAURIA")
  1023.     Combo1.AddItem UCase$("LAVIOLETTE")
  1024.     Combo1.AddItem UCase$("LAW")
  1025.     Combo1.AddItem UCase$("LAWLESS")
  1026.     Combo1.AddItem UCase$("LAWSON")
  1027.     Combo1.AddItem UCase$("LAWTON")
  1028.     Combo1.AddItem UCase$("LEBEIKO")
  1029.     Combo1.AddItem UCase$("LEDBETTER")
  1030.     Combo1.AddItem UCase$("LEE")
  1031.     Combo1.AddItem UCase$("LEESE")
  1032.     Combo1.AddItem UCase$("LEGGIO")
  1033.     Combo1.AddItem UCase$("LEIBSON")
  1034.     Combo1.AddItem UCase$("LELCHITSKY")
  1035.     Combo1.AddItem UCase$("LEMON")
  1036.     Combo1.AddItem UCase$("leno")
  1037.     Combo1.AddItem UCase$("Leonard")
  1038.     Combo1.AddItem UCase$("LESSER")
  1039.     Combo1.AddItem UCase$("LETOWT")
  1040.     Combo1.AddItem UCase$("LEU")
  1041.     Combo1.AddItem UCase$("LEUNG")
  1042.     Combo1.AddItem UCase$("LEVIN")
  1043.     Combo1.AddItem UCase$("LEVITT")
  1044.     Combo1.AddItem UCase$("LEVY")
  1045.     Combo1.AddItem UCase$("LEWART")
  1046.     Combo1.AddItem UCase$("LEWIS")
  1047.     Combo1.AddItem UCase$("Marsh")
  1048.     Combo1.AddItem UCase$("Martin")
  1049.     Combo1.AddItem UCase$("Martinez")
  1050.     Combo1.AddItem UCase$("Morgan")
  1051.     Combo1.AddItem UCase$("Morris")
  1052.     Combo1.AddItem UCase$("Morse")
  1053.     Combo1.AddItem UCase$("Parker")
  1054.     Combo1.AddItem UCase$("Parrett")
  1055.     Combo1.AddItem UCase$("Paterson")
  1056.     Combo1.AddItem UCase$("Richman")
  1057.     Combo1.AddItem UCase$("Rieman")
  1058.     Combo1.AddItem UCase$("Rinehart")
  1059.     Combo1.AddItem UCase$("Shaiman")
  1060.     Combo1.AddItem UCase$("Shaw")
  1061.     Combo1.AddItem UCase$("Shellman")
  1062.     Combo1.AddItem UCase$("Sumner")
  1063.     Combo1.AddItem UCase$("Sutherland")
  1064.     Combo1.AddItem UCase$("Swanson")
  1065.     Combo1.AddItem UCase$("Waage")
  1066.     Combo1.AddItem UCase$("Wagner")
  1067.     Combo1.AddItem UCase$("Walker")
  1068.     Combo1.AddItem UCase$("Wilson")
  1069.     Combo1.AddItem UCase$("Wong")
  1070.     Combo1.AddItem UCase$("Younger")
  1071. End Sub
  1072. Private Sub Form_Unload(Cancel As Integer)
  1073.     End
  1074. End Sub
  1075.